home *** CD-ROM | disk | FTP | other *** search
/ Chip: Net Guide / CHIP NET Rehberi Eylül 1998.iso / ftp / iftp21 / EXAMPLES.ZIP / WEBSITE.FTP < prev   
Encoding:
Text File  |  1997-05-23  |  901 b   |  34 lines
  1. ;---------------------------------------------------------
  2. ; iFTP script for WEB SITE
  3. ;---------------------------------------------------------
  4.  
  5. ;DEBUG ON
  6.  
  7.   log Logging into FTP WEBSITE site.....
  8.   OPEN website
  9.   if not success goto error
  10.  
  11. ;----------------------------------------------------------
  12. ; check for local files to send to ftp site
  13. ;----------------------------------------------------------
  14. LABEL step1
  15.  
  16.   log Step 1: Check for local files to send...
  17.   if not exist websend\*.* goto success
  18.   put websend\*.* /kill
  19.   if not success goto error
  20.   goto success
  21.  
  22. ;---------------------------------------------------------------
  23. LABEL success
  24.   log Successful session!
  25.   goto end
  26.  
  27. ;---------------------------------------------------------------
  28. LABEL error
  29.   WriteError
  30.   goto end
  31.  
  32. ;---------------------------------------------------------------
  33. LABEL end
  34.